home *** CD-ROM | disk | FTP | other *** search
/ Aminet 6 / Aminet 6 - June 1995.iso / Tools / Useful / ARCHandler / S / WhichLhA < prev   
Encoding:
Text File  |  1994-07-06  |  146 b   |  10 lines
  1. Which >NIL: LhA
  2. If WARN
  3.   SetEnv lhapath ""
  4. Else
  5.   SetEnv lhapath `Which LhA`
  6.   If "$lhapath" EQ "RES LhA"
  7.     SetEnv lhapath "LhA"
  8.   EndIf
  9. EndIf
  10.